home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / comm2 / nwclnmbm.lha / QuitUMS.rexx < prev    next >
OS/2 REXX Batch file  |  1995-08-08  |  258b  |  14 lines

  1. /* quit the currently running default UMS server */
  2.  
  3. libname = "ums.library"
  4.  
  5. if ~show("L", libname) then do
  6.   if ~addlib(libname, 0, -210, 8) then do
  7.     say libname "not found!"
  8.     exit
  9.   end
  10. end
  11.  
  12. say "quitting..."
  13. call UMSServerControl("Quit","default")
  14.